program casa;
function x:integer;
begin
end;
begin
	case x of
	1:x:= 24;
	2:begin end;
	end;
end.
